perm filename MOV[SCR,LCS]1 blob sn#374042 filedate 1978-08-15 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	PRECEDE
C00003 ENDMK
CāŠ—;
PRECEDE;
FUNC FUN.FUN[SCR,LCS];
INST TOOT TOP BOTM;
PLAY;TOOT 0 12 220 1 F2 0 0 0 0 0 0 0 F4;
*
TOOT 0 24;
P2 .2 ;
P3 MOVE/12 220 1760;
P4 1; P5 F2;
P13 F4;
END;
TOOT 12;
P3 MOVX/12 220 1760;
END;